home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Rinaldi / HC 1.2 & 2.0 / FullReplace 1.1.cpt / FullReplace 1.1 (US) / card_3055.txt < prev    next >
Text File  |  1992-02-24  |  4KB  |  129 lines

  1. -- card: 3055 from stack: in.1 (US)
  2. -- bmap block id: 3273
  3. -- flags: 0000
  4. -- background id: 2661
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 01
  10. -- high flags: 0007
  11. -- rect: left=69 top=68 right=252 bottom=434
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 3
  16. -- text size: 9
  17. -- style flags: 0
  18. -- line height: 12
  19. -- part name: 
  20.  
  21.  
  22. -- part 5 (button)
  23. -- low flags: 00
  24. -- high flags: A003
  25. -- rect: left=174 top=281 right=311 bottom=343
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 1
  29. -- font id: 0
  30. -- text size: 12
  31. -- style flags: 0
  32. -- line height: 16
  33. -- part name: FullReplace
  34. ----- HyperTalk script -----
  35. on mouseUp
  36.   put line 43 to 200 of cd fld 1 into cd fld 2
  37.   show cd fld 2
  38.   ask "Remplace :" with "e"
  39.   if it = empty
  40.   then exit mouseUp
  41.   put it into Search
  42.   ask "By :" with "‚Ä¢"
  43.   if it = empty
  44.   then exit mouseUp
  45.   put FullReplace(cd fld 2,Search,it) into cd fld 2
  46. end mouseUp
  47.  
  48.  
  49. -- part 17 (field)
  50. -- low flags: 81
  51. -- high flags: 0004
  52. -- rect: left=120 top=62 right=271 bottom=393
  53. -- title width / last selected line: 0
  54. -- icon id / first selected line: 0 / 0
  55. -- text alignment: 0
  56. -- font id: 3
  57. -- text size: 9
  58. -- style flags: 0
  59. -- line height: 12
  60. -- part name: 
  61. ----- HyperTalk script -----
  62. on mouseup
  63.   hide me
  64. end mouseUP
  65.  
  66.  
  67. -- part contents for card part 1
  68. ----- text -----
  69.  
  70.  
  71.                                               FullReplace 1.1
  72.  
  73.                                           by Fr√©d√©ric RINALDI
  74.  
  75.  
  76. DESCRIPTION
  77. ------------
  78.    FullReplace allows to strip or replace a string in a text.
  79.  
  80. SYNTAXE
  81. ---------
  82.             FullReplace (<input>,<search pattern>[,<replace pattern>
  83.                                          [,<all>[,<offset>]]])
  84.  
  85. PARAMETRES
  86. ------------
  87.    Parameters 3 to 5 are optionals.
  88.  
  89.    <input> is the text that will be parsed.
  90.  
  91.    <search pattern> is the string to search for.
  92.  
  93.    <replace pattern>  is the replacement string to search for. It may be empty.
  94.  
  95.    <all> is a boolean, telling if all matches (true) must be handled, or only the first one (false). Default is true.
  96.  
  97.    <offset> is the char number at which the search will begin. Default is 1.
  98.  
  99.    Using "!" and "?" returns online help (resp. about and syntax).
  100.  
  101. USING
  102. ------
  103.   FullReplace will return the input text, once replacement done. Pattern searching is not cas sensitive.
  104.  
  105. If an error occurs, FullREplace will return :
  106.      "Error : Missing parameter(s)"
  107.      "Error : Param #4 must be boolean"
  108.      "Error : Param #5 must be > 0"
  109.  
  110. HISTORY
  111. -------
  112. 1.1                                                                                            02/23/92
  113. ‚Ä¢ Search no more limited to 32000 chars
  114. --------------------------------------------------------------------
  115. This (these) external(s) is (are) FreeWare,allowing unlimited use in any non-commercial stack. You just need in this case to mention the author's name and copyright in your stack.
  116. Any commercial use must be licensed and aknowledged by the author.
  117.  
  118.                                      ¬© F. Rinaldi - 1991,1992
  119.  
  120. AppleLink: RINALDI1        CalvaCom : FR10        Compuserve : 71170,2111
  121.  
  122. -- part contents for card part 17
  123. ----- text -----
  124. This (th‚Ä¢s‚Ä¢) ‚Ä¢xt‚Ä¢rnal(s) is (ar‚Ä¢) Fr‚Ä¢‚Ä¢War‚Ä¢,allowing unlimit‚Ä¢d us‚Ä¢ in any non-comm‚Ä¢rcial stack. You just n‚Ä¢‚Ä¢d in this cas‚Ä¢ to m‚Ä¢ntion th‚Ä¢ author's nam‚Ä¢ and copyright in your stack.
  125. Any comm‚Ä¢rcial us‚Ä¢ must b‚Ä¢ lic‚Ä¢ns‚Ä¢d and aknowl‚Ä¢dg‚Ä¢d by th‚Ä¢ author.
  126.  
  127.                                      ¬© F. Rinaldi - 1991
  128.  
  129. Appl‚Ä¢Link: RINALDI1        CalvaCom : FR10        Compus‚Ä¢rv‚Ä¢ : 71170,2111